home *** CD-ROM | disk | FTP | other *** search
/ Almathera Ten Pack 3: CDPD 3 / Almathera Ten on Ten - Disc 3: CDPD3.iso / fish / 726-750 / 734 / powervisor / s / pv / db < prev    next >
Text File  |  1995-03-18  |  1KB  |  35 lines
  1. ;Setup debug keys and some parameters
  2.  
  3. swin
  4. dwin 14
  5.  
  6. pref dmode n
  7. pref debug 5 1
  8. _k1={attach 'tr' 031 08 e}
  9. _k2={attach 'tr' 015 08 e}
  10. _k3={attach 'tr o' 020 08 e}
  11. _k4={attach 'tr s' 021 08 e}
  12. _k5={attach 'tr t' 014 08 e}
  13. _k6={attach '{getstring \'Give address\' 256;disp eval(input);tr u eval(input)}' 016 040 e}
  14. _k7={attach 'tr b' 035 040 e}
  15. _k8={attach 'tr g' 013 08 e}
  16. _k9={attach 'tr h' 032 08 e}
  17. _k10={attach 'v if((isbreak(toppc())&255)==0,{-break t toppc()},{break r isbreak(toppc())>>16})' 035 08 e}
  18. _k11={attach '{getstring \'Give window start address\' 256;disp eval(input);dstart eval(input)}' 020 080 e}
  19. _k12={attach '{getstring \'Give breakpoint address\' 256;disp eval(input);break n eval(input)}' 035 080 e}
  20. alias fdebug '{rema \(_k1);rema \(_k2);rema \(_k3);rema \(_k4);rema \(_k5);rema \(_k6);rema \(_k7);rema \(_k8);rema \(_k9);rema \(_k10);rema \(_k11);rema \(_k12);sw;dw;alias fdebug \'script db\'}
  21. remvar _k1 _k2 _k3 _k4 _k5 _k6 _k7 _k8 _k9 _k10 _k11 _k12
  22. print '\0a'
  23. print 'ctrl-Z = trace\0a'
  24. print 'ctrl-Y = trace\0a'
  25. print 'ctrl-A = trace after\0a'
  26. print 'ctrl-S = skip\0a'
  27. print 'ctrl-R = run program\0a'
  28. print 'ctrl-X = halt running program\0a'
  29. print 'ctrl-B = (re)set temporary breakpoint in top of debug window\0a'
  30. print 'ctrl-T = trace but trace over BSR or JSR\0a'
  31. print 'LAmiga-U = trace until ...\0a'
  32. print 'LAmiga-B = trace until branch\0a'
  33. print 'RAmiga-A = set window start address ...\0a'
  34. print 'RAmiga-B = set permanent breakpoint ...\0a'
  35.